Skunkware 5/Skunkware 5.iso/src/X11/Desktop/trash.dt

Text File | 1995-07-16 | 4KB | 279 lines

%/dt/

%//  WARNING

%//  This file has had a new desktop_layout clause inserted. If there was a
%//  previous desktop_layout clause in the file, it will not have been removed,
%//  but it will be ignored by X.desktop from now on.

%//  See the manual for further details.

dt
{
}


icon_rules
{
  * /G { picture=; }
  * /4 { picture=trash_c.px; }
  * /4
  {
    trigger_action: select
    {
      select -s $static_arg
    }
    trigger_action: alt_select
    {
      select -t $static_arg
    }
    trigger_action: add_select
    {
      select -a $static_arg
    }
    drop_in_action: deselect
    {
      select -u `( query selections $static_arg )
    }
    trigger_action: rename
    {
      select -s $static_arg
    }
    trigger_action: menu
    {
      :passed_arg=$static_arg
      popup TrashItemMenu
    }
  }
}


menu: DesktopMenuBar
{
  menu_item:File_F__
  { pull_off_menu=TrashFileMenu }
  menu_item:Edit_E__
  { pull_off_menu=TrashEditMenu }
  menu_item:View_V__
  { pull_off_menu=DesktopViewMenu }
  menu_item:Options_O__
  { pull_off_menu=TrashOptionsMenu }
  menu_item:Help_H__
  { pull_off_menu=TrashHelpMenu }
}

menu: DesktopBackPopupMenu
{
  menu_item:File_F__
  { pull_off_menu=TrashFileMenu }
  menu_item:Edit_E__
  { pull_off_menu=TrashEditMenu }
  menu_item:View_V__
  { pull_off_menu=DesktopViewMenu }
  menu_item:Options_O__
  { pull_off_menu=TrashOptionsMenu }
  menu_item:Help_H__
  { pull_off_menu=TrashHelpMenu }
}


menu: TrashFileMenu
{
  menu_item
  {
    title=Restore_R__;
    enable_if
    {
      false `( list count `( query selections $HOME/trash.dt ))
    }
    action
    {
      for icon in `( query selections $HOME/trash.dt )
      do
    action noswap recover $icon
      done

      check_trash_picture
    }
  }


  menu_item
  {
    title=Delete_D__;
    enable_if
    {
    }
    action
    {
      if [ == `( get_option trashConfirm TrashConfirm 'true' ) 'true' ]
      then
        if ask 'Deletion of trashed items is permanent.
Do you wish to continue?'
        then
          remove_trash `( query selections $HOME/trash.dt )
        fi
      else
        remove_trash `( query selections $HOME/trash.dt )
      fi
    }
  }

  menu_item
  {
    title=Empty_E__;
    enable_if
    {
      false `( list count `( query contents $HOME/trash.dt ))
    }
    action
    {
      empty_trash
    }
  }

  dividing_line

  menu_item:Close Trash Can_C_
  {
    open_desktop $HOME/trash.dt -h
    class_number $CLOSE $HOME/trash.dt
  }
}


menu: TrashHelpMenu
{
  menu_item
  {
    title=On Trash_T__;
    action
    {
      help trash
    }
  }
  menu_item
  {
    title=Index_I__;
    action
    {
      help INDEX
    }
  }
  menu_item
  {
    title=On Help_H__;
    action
    {
      help Help
    }
  }
  menu_item
  {
    title=On Version_V__;
    action
    {
      show_greeting
    }
  }
}

menu: TrashOptionsMenu
{
  menu_item
  {
    title=Trash Preferences..._T__;
    pull_off_menu=TrashPrefMenu;
  }
  menu_item
  {
    title=General Preferences..._G__;
    pull_off_menu=GeneralPrefMenu;
  }
}


menu: TrashPrefMenu
{
  menu_item
  {
    title=Fonts_F__;
    enable_if
    {
    }
    action
    {
      pref_ed -group trash -type font
    }
  }
  menu_item
  {
    title=Patterns_P__;
    enable_if
    {
    }
    action
    {
      pref_ed -group trash -type pixmap
    }
  }
}


menu: TrashEditMenu
{
  menu_item dir_select_all
  {
    title=Select All_S_Ctrl<Key>slash_Ctrl+/;
    action
    {
      select -D $HOME/trash.dt
    }
  }

  menu_item dir_deselect_all
  {
    title=Deselect All_D_Ctrl<Key>backslash_Ctrl+\;
    enable_if
    {
      false `( list count `( query selections $HOME/trash.dt ))
    }
    action
    {
      select -u `( query selections $HOME/trash.dt )
    }
  }
}


menu: TrashItemMenu
{
  menu_item
  {
    title=Restore_R__;
    action
    {
      action noswap recover $:passed_arg
      check_trash_picture
    }
  }

  menu_item
  {
    title=Delete_D__;
    action
    {
      if [ == `( get_option trashConfirm TrashConfirm 'true' ) 'true' ]
      then
        if ask 'Deletion of trashed items is permanent.
Do you wish to continue?'
        then
          remove_trash $:passed_arg
        fi
      else
        remove_trash $:passed_arg
      fi
    }
  }
}